Chip: Special Tips & Tricks for Windows 95/Chip Wintips.iso/sharewar/multimed/wavemake/wmwin.exe/0/RCDATA/TWAVSCANDLG/TWAVSCANDLG.txt

Text File | 1996-04-23 | 9KB | 414 lines

object WAVscanDlg: TWAVscanDlg
  Left = 156
  Top = 42
  ActiveControl = CancelBtn
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'WAV Scan'
  ClientHeight = 383
  ClientWidth = 337
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  PixelsPerInch = 96
  OnActivate = FormActivate
  TextHeight = 13
  object gauge: TGauge
    Left = 16
    Top = 352
    Width = 129
    Height = 17
    Color = clLime
    ForeColor = clLime
    ParentColor = False
    Progress = 0
  end
  object Bevel1: TBevel
    Left = 8
    Top = 344
    Width = 145
    Height = 33
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 321
    Height = 41
    Caption = 'File'
    TabOrder = 2
    object fileEdit: TEdit
      Left = 8
      Top = 16
      Width = 305
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 0
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 56
    Width = 321
    Height = 41
    Caption = 'Format'
    TabOrder = 3
    object Label1: TLabel
      Left = 8
      Top = 16
      Width = 22
      Height = 13
      Caption = 'Bits'
    end
    object Label2: TLabel
      Left = 80
      Top = 16
      Width = 55
      Height = 13
      Caption = 'Rate (Hz)'
    end
    object Label7: TLabel
      Left = 224
      Top = 16
      Width = 53
      Height = 13
      Caption = 'Channels'
    end
    object bitEdit: TEdit
      Left = 40
      Top = 16
      Width = 25
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 0
    end
    object rateEdit: TEdit
      Left = 144
      Top = 16
      Width = 65
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 1
    end
    object channelEdit: TEdit
      Left = 288
      Top = 16
      Width = 25
      Height = 20
      Enabled = False
      TabOrder = 2
    end
  end
  object GroupBox3: TGroupBox
    Left = 8
    Top = 104
    Width = 321
    Height = 41
    Caption = 'Duration'
    TabOrder = 4
    object Label3: TLabel
      Left = 8
      Top = 16
      Width = 48
      Height = 13
      Caption = 'Samples'
    end
    object Label4: TLabel
      Left = 184
      Top = 16
      Width = 16
      Height = 13
      Caption = 'ms'
    end
    object sampleEdit: TEdit
      Left = 72
      Top = 16
      Width = 105
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 0
    end
    object msEdit: TEdit
      Left = 208
      Top = 16
      Width = 105
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 1
    end
  end
  object GroupBox4: TGroupBox
    Left = 8
    Top = 152
    Width = 321
    Height = 185
    Caption = 'Statistics'
    TabOrder = 5
    object Label5: TLabel
      Left = 8
      Top = 32
      Width = 25
      Height = 13
      Caption = 'Min.'
    end
    object Label6: TLabel
      Left = 112
      Top = 16
      Width = 8
      Height = 13
      Caption = 'L'
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object minRlabel: TLabel
      Left = 248
      Top = 16
      Width = 10
      Height = 13
      Caption = 'R'
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label8: TLabel
      Left = 8
      Top = 56
      Width = 28
      Height = 13
      Caption = 'Max.'
    end
    object Label11: TLabel
      Left = 8
      Top = 80
      Width = 28
      Height = 13
      Caption = 'RMS'
    end
    object Label14: TLabel
      Left = 8
      Top = 136
      Width = 35
      Height = 13
      Caption = 'Satur.'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object gaugeL: TGauge
      Left = 56
      Top = 104
      Width = 121
      Height = 25
      Color = clRed
      Kind = gkNeedle
      ParentColor = False
      Progress = 0
    end
    object gaugeR: TGauge
      Left = 192
      Top = 104
      Width = 121
      Height = 25
      Color = clBlue
      Kind = gkNeedle
      ParentColor = False
      Progress = 0
    end
    object satGaugeL: TGauge
      Left = 56
      Top = 160
      Width = 121
      Height = 17
      Color = clRed
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ForeColor = clRed
      ParentColor = False
      ParentFont = False
      Progress = 0
    end
    object satGaugeR: TGauge
      Left = 192
      Top = 160
      Width = 121
      Height = 17
      Color = clBlue
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ForeColor = clBlue
      ParentColor = False
      ParentFont = False
      Progress = 0
    end
    object minLedit: TEdit
      Left = 56
      Top = 32
      Width = 121
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 0
    end
    object minRedit: TEdit
      Left = 192
      Top = 32
      Width = 121
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 1
    end
    object maxLedit: TEdit
      Left = 56
      Top = 56
      Width = 121
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 2
    end
    object maxRedit: TEdit
      Left = 192
      Top = 56
      Width = 121
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 3
    end
    object rmsLedit: TEdit
      Left = 56
      Top = 80
      Width = 121
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 4
    end
    object rmsRedit: TEdit
      Left = 192
      Top = 80
      Width = 121
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 5
    end
    object saturLedit: TEdit
      Left = 56
      Top = 136
      Width = 121
      Height = 20
      Enabled = False
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 6
    end
    object saturRedit: TEdit
      Left = 192
      Top = 136
      Width = 121
      Height = 20
      Enabled = False
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 7
    end
  end
  object CancelBtn: TBitBtn
    Left = 248
    Top = 344
    Width = 81
    Height = 33
    Cursor = crArrow
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
    OnClick = CancelBtnClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333333000033337733333333333333333F333333333333
      0000333911733333973333333377F333333F3333000033391117333911733333
      37F37F333F77F33300003339111173911117333337F337F3F7337F3300003333
      911117111117333337F3337F733337F3000033333911111111733333337F3337
      3333F7330000333333911111173333333337F333333F73330000333333311111
      7333333333337F3333373333000033333339111173333333333337F333733333
      00003333339111117333333333333733337F3333000033333911171117333333
      33337333337F333300003333911173911173333333373337F337F33300003333
      9117333911173333337F33737F337F33000033333913333391113333337FF733
      37F337F300003333333333333919333333377333337FFF730000333333333333
      3333333333333333333777330000333333333333333333333333333333333333
      0000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object OKBtn: TBitBtn
    Left = 160
    Top = 344
    Width = 81
    Height = 33
    Caption = 'OK'
    Enabled = False
    ModalResult = 1
    TabOrder = 0
    OnClick = OKbtnClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333377F3333333333000033334224333333333333
      337337F3333333330000333422224333333333333733337F3333333300003342
      222224333333333373333337F3333333000034222A22224333333337F337F333
      7F33333300003222A3A2224333333337F3737F337F33333300003A2A333A2224
      33333337F73337F337F33333000033A33333A222433333337333337F337F3333
      0000333333333A222433333333333337F337F33300003333333333A222433333
      333333337F337F33000033333333333A222433333333333337F337F300003333
      33333333A222433333333333337F337F00003333333333333A22433333333333
      3337F37F000033333333333333A223333333333333337F730000333333333333
      333A333333333333333337330000333333333333333333333333333333333333
      0000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object timer: TTimer
    Enabled = False
    Interval = 500
    OnTimer = timerTimer
    Left = 312
  end
end